home *** CD-ROM | disk | FTP | other *** search
| Emacs Compiled Lisp | 1995-08-29 | 3.5 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: Emacs Compiled Lisp
(other/emacsCompiledLisp).
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 1%
| dexvert
| Emacs Compiled Lisp (other/emacsCompiledLisp)
| magic
| Unsupported |
| 1%
| dexvert
| Combustion 2 Particle Library (other/combustion2ParticleLibrary)
| ext
| Unsupported |
| 100%
| file
| Emacs/XEmacs v19 byte-compiled Lisp data
| default
| |
| 99%
| file
| data
| default
| |
| 100%
| TrID
| Emacs/XEmacs byte-compiled Lisp (generic)
| default
| |
| 100%
| xdgMime
| text/x-emacs-lisp
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 63 74 68 6f 6d 70 40 |piled by| cthomp@|
|00000020| 77 69 6c 6c 6f 77 2e 63 | 73 2e 75 69 75 63 2e 65 |willow.c|s.uiuc.e|
|00000030| 64 75 20 6f 6e 20 54 75 | 65 20 41 75 67 20 32 39 |du on Tu|e Aug 29|
|00000040| 20 31 34 3a 32 30 3a 31 | 35 20 31 39 39 35 0a 3b | 14:20:1|5 1995.;|
|00000050| 3b 3b 20 66 72 6f 6d 20 | 66 69 6c 65 20 2f 78 65 |;; from |file /xe|
|00000060| 6d 61 63 73 2f 78 65 6d | 61 63 73 2d 31 39 2e 31 |macs/xem|acs-19.1|
|00000070| 33 2d 72 65 6c 65 61 73 | 65 2f 65 64 69 74 6f 72 |3-releas|e/editor|
|00000080| 2f 6c 69 73 70 2f 70 72 | 69 6d 2f 64 69 73 70 2d |/lisp/pr|im/disp-|
|00000090| 74 61 62 6c 65 2e 65 6c | 0a 3b 3b 3b 20 65 6d 61 |table.el|.;;; ema|
|000000a0| 63 73 20 76 65 72 73 69 | 6f 6e 20 31 39 2e 31 33 |cs versi|on 19.13|
|000000b0| 20 58 45 6d 61 63 73 20 | 4c 75 63 69 64 2e 0a 3b | XEmacs |Lucid..;|
|000000c0| 3b 3b 20 62 79 74 65 63 | 6f 6d 70 20 76 65 72 73 |;; bytec|omp vers|
|000000d0| 69 6f 6e 20 32 2e 32 35 | 3b 20 31 2d 53 65 70 2d |ion 2.25|; 1-Sep-|
|000000e0| 39 34 2e 0a 3b 3b 3b 20 | 6f 70 74 69 6d 69 7a 61 |94..;;; |optimiza|
|000000f0| 74 69 6f 6e 20 69 73 20 | 6f 6e 2e 0a 3b 3b 3b 20 |tion is |on..;;; |
|00000100| 74 68 69 73 20 66 69 6c | 65 20 75 73 65 73 20 6f |this fil|e uses o|
|00000110| 70 63 6f 64 65 73 20 77 | 68 69 63 68 20 64 6f 20 |pcodes w|hich do |
|00000120| 6e 6f 74 20 65 78 69 73 | 74 20 69 6e 20 45 6d 61 |not exis|t in Ema|
|00000130| 63 73 20 31 38 2e 0a 0a | 28 69 66 20 28 61 6e 64 |cs 18...|(if (and|
|00000140| 20 28 62 6f 75 6e 64 70 | 20 27 65 6d 61 63 73 2d | (boundp| 'emacs-|
|00000150| 76 65 72 73 69 6f 6e 29 | 0a 09 20 28 6f 72 20 28 |version)|.. (or (|
|00000160| 61 6e 64 20 28 62 6f 75 | 6e 64 70 20 27 65 70 6f |and (bou|ndp 'epo|
|00000170| 63 68 3a 3a 76 65 72 73 | 69 6f 6e 29 20 65 70 6f |ch::vers|ion) epo|
|00000180| 63 68 3a 3a 76 65 72 73 | 69 6f 6e 29 0a 09 20 20 |ch::vers|ion).. |
|00000190| 20 20 20 28 73 74 72 69 | 6e 67 2d 6c 65 73 73 70 | (stri|ng-lessp|
|000001a0| 20 65 6d 61 63 73 2d 76 | 65 72 73 69 6f 6e 20 22 | emacs-v|ersion "|
|000001b0| 31 39 22 29 29 29 0a 20 | 20 20 20 28 65 72 72 6f |19"))). | (erro|
|000001c0| 72 20 22 54 68 69 73 20 | 66 69 6c 65 20 77 61 73 |r "This |file was|
|000001d0| 20 63 6f 6d 70 69 6c 65 | 64 20 66 6f 72 20 45 6d | compile|d for Em|
|000001e0| 61 63 73 20 31 39 2e 22 | 29 29 0a 0a 28 66 73 65 |acs 19."|))..(fse|
|000001f0| 74 20 27 64 65 73 63 72 | 69 62 65 2d 64 69 73 70 |t 'descr|ibe-disp|
|00000200| 6c 61 79 2d 74 61 62 6c | 65 20 23 5b 28 64 74 29 |lay-tabl|e #[(dt)|
|00000210| 20 22 c0 90 c1 c2 21 88 | 8a 0b 71 88 c4 c5 c6 5c | "....!.|..q....\|
|00000220| 22 c7 1e 08 1e 09 0e 08 | c5 57 ab 93 0e 09 0e 08 |".......|.W......|
|00000230| 0e 5c 6e 0e 08 48 49 88 | 0e 08 54 89 16 08 aa 69 |.\n..HI.|..T....i|
|00000240| cb 0e 09 21 88 2a cc 20 | 88 29 cd 20 91 87 22 20 |...!.*. |.). .." |
|00000250| 5b 22 2a 48 65 6c 70 2a | 22 20 70 72 69 6e 63 20 |["*Help*|" princ |
|00000260| 22 5c 6e 43 68 61 72 61 | 63 74 65 72 20 64 69 73 |"\nChara|cter dis|
|00000270| 70 6c 61 79 20 67 6c 79 | 70 68 20 73 65 71 75 65 |play gly|ph seque|
|00000280| 6e 63 65 73 3a 5c 6e 22 | 20 73 74 61 6e 64 61 72 |nces:\n"| standar|
|00000290| 64 2d 6f 75 74 70 75 74 | 20 6d 61 6b 65 2d 76 65 |d-output| make-ve|
|000002a0| 63 74 6f 72 20 32 35 36 | 20 6e 69 6c 20 30 20 69 |ctor 256| nil 0 i|
|000002b0| 20 76 65 63 74 6f 72 20 | 64 74 20 64 65 73 63 72 | vector |dt descr|
|000002c0| 69 62 65 2d 76 65 63 74 | 6f 72 20 68 65 6c 70 2d |ibe-vect|or help-|
|000002d0| 6d 6f 64 65 20 70 72 69 | 6e 74 2d 68 65 6c 70 2d |mode pri|nt-help-|
|000002e0| 72 65 74 75 72 6e 2d 6d | 65 73 73 61 67 65 5d 20 |return-m|essage] |
|000002f0| 36 20 22 5c 0a 44 65 73 | 63 72 69 62 65 20 74 68 |6 "\.Des|cribe th|
|00000300| 65 20 64 69 73 70 6c 61 | 79 20 74 61 62 6c 65 20 |e displa|y table |
|00000310| 44 54 20 69 6e 20 61 20 | 68 65 6c 70 20 62 75 66 |DT in a |help buf|
|00000320| 66 65 72 2e 22 5d 29 0a | 28 66 73 65 74 20 27 64 |fer."]).|(fset 'd|
|00000330| 65 73 63 72 69 62 65 2d | 63 75 72 72 65 6e 74 2d |escribe-|current-|
|00000340| 64 69 73 70 6c 61 79 2d | 74 61 62 6c 65 20 23 5b |display-|table #[|
|00000350| 28 26 6f 70 74 69 6f 6e | 61 6c 20 64 6f 6d 61 69 |(&option|al domai|
|00000360| 6e 29 20 22 08 ac 83 c1 | 20 10 c2 0b 08 5c 22 89 |n) "....| ....\".|
|00000370| 1c ab 85 c5 0c 21 aa 83 | c6 c7 21 29 87 22 20 5b |.....!..|..!)." [|
|00000380| 64 6f 6d 61 69 6e 20 73 | 65 6c 65 63 74 65 64 2d |domain s|elected-|
|00000390| 77 69 6e 64 6f 77 20 73 | 70 65 63 69 66 69 65 72 |window s|pecifier|
|000003a0| 2d 69 6e 73 74 61 6e 63 | 65 20 63 75 72 72 65 6e |-instanc|e curren|
|000003b0| 74 2d 64 69 73 70 6c 61 | 79 2d 74 61 62 6c 65 20 |t-displa|y-table |
|000003c0| 64 69 73 70 74 61 62 20 | 64 65 73 63 72 69 62 65 |disptab |describe|
|000003d0| 2d 64 69 73 70 6c 61 79 | 2d 74 61 62 6c 65 20 6d |-display|-table m|
|000003e0| 65 73 73 61 67 65 20 22 | 4e 6f 20 64 69 73 70 6c |essage "|No displ|
|000003f0| 61 79 20 74 61 62 6c 65 | 22 5d 20 34 20 22 5c 0a |ay table|"] 4 "\.|
|00000400| 44 65 73 63 72 69 62 65 | 20 74 68 65 20 64 69 73 |Describe| the dis|
|00000410| 70 6c 61 79 20 74 61 62 | 6c 65 20 69 6e 20 75 73 |play tab|le in us|
|00000420| 65 20 69 6e 20 74 68 65 | 20 73 65 6c 65 63 74 65 |e in the| selecte|
|00000430| 64 20 77 69 6e 64 6f 77 | 20 61 6e 64 20 62 75 66 |d window| and buf|
|00000440| 66 65 72 2e 22 20 6e 69 | 6c 5d 29 0a 28 66 73 65 |fer." ni|l]).(fse|
|00000450| 74 20 27 6d 61 6b 65 2d | 64 69 73 70 6c 61 79 2d |t 'make-|display-|
|00000460| 74 61 62 6c 65 20 23 5b | 6e 69 6c 20 22 c0 c1 c2 |table #[|nil "...|
|00000470| 5c 22 87 22 20 5b 6d 61 | 6b 65 2d 76 65 63 74 6f |\"." [ma|ke-vecto|
|00000480| 72 20 32 35 36 20 6e 69 | 6c 5d 20 33 20 22 5c 0a |r 256 ni|l] 3 "\.|
|00000490| 52 65 74 75 72 6e 20 61 | 20 6e 65 77 2c 20 65 6d |Return a| new, em|
|000004a0| 70 74 79 20 64 69 73 70 | 6c 61 79 20 74 61 62 6c |pty disp|lay tabl|
|000004b0| 65 2e 22 5d 29 0a 28 62 | 79 74 65 2d 63 6f 64 65 |e."]).(b|yte-code|
|000004c0| 20 22 c0 c1 4d 88 c2 c3 | 4d 87 22 20 5b 66 72 6f | "..M...|M." [fro|
|000004d0| 62 2d 64 69 73 70 6c 61 | 79 2d 74 61 62 6c 65 20 |b-displa|y-table |
|000004e0| 23 5b 28 66 64 74 2d 66 | 75 6e 63 74 69 6f 6e 20 |#[(fdt-f|unction |
|000004f0| 66 64 74 2d 6c 6f 63 61 | 6c 65 29 20 22 08 ac 82 |fdt-loca|le) "...|
|00000500| c1 10 c2 0b 08 5c 22 ac | 87 c4 0b c5 20 08 23 88 |.....\".|.... .#.|
|00000510| c6 0b 08 c7 c8 c2 0b 08 | 5c 22 89 1e 09 40 41 29 |........|\"...@A)|
|00000520| 5c 22 42 43 5c 22 87 22 | 20 5b 66 64 74 2d 6c 6f |\"BC\"."| [fdt-lo|
|00000530| 63 61 6c 65 20 67 6c 6f | 62 61 6c 20 73 70 65 63 |cale glo|bal spec|
|00000540| 69 66 69 65 72 2d 73 70 | 65 63 2d 6c 69 73 74 20 |ifier-sp|ec-list |
|00000550| 63 75 72 72 65 6e 74 2d | 64 69 73 70 6c 61 79 2d |current-|display-|
|00000560| 74 61 62 6c 65 20 61 64 | 64 2d 73 70 65 63 2d 74 |table ad|d-spec-t|
|00000570| 6f 2d 73 70 65 63 69 66 | 69 65 72 20 6d 61 6b 65 |o-specif|ier make|
|00000580| 2d 64 69 73 70 6c 61 79 | 2d 74 61 62 6c 65 20 61 |-display|-table a|
|00000590| 64 64 2d 73 70 65 63 2d | 6c 69 73 74 2d 74 6f 2d |dd-spec-|list-to-|
|000005a0| 73 70 65 63 69 66 69 65 | 72 20 6d 61 70 63 61 72 |specifie|r mapcar|
|000005b0| 20 23 5b 28 66 64 74 2d | 78 29 20 22 08 09 41 21 | #[(fdt-|x) "..A!|
|000005c0| 88 09 87 22 20 5b 66 64 | 74 2d 66 75 6e 63 74 69 |..." [fd|t-functi|
|000005d0| 6f 6e 20 66 64 74 2d 78 | 5d 20 32 5d 20 78 5d 20 |on fdt-x|] 2] x] |
|000005e0| 39 5d 20 73 74 61 6e 64 | 61 72 64 2d 64 69 73 70 |9] stand|ard-disp|
|000005f0| 6c 61 79 2d 38 62 69 74 | 2d 31 20 23 5b 28 64 74 |lay-8bit|-1 #[(dt|
|00000600| 20 6c 20 68 29 20 22 08 | 09 58 ad 8d 5c 6e 08 c3 | l h) ".|.X..\n..|
|00000610| 08 21 49 88 08 54 89 10 | aa 6f 87 22 20 5b 6c 20 |.!I..T..|.o." [l |
|00000620| 68 20 64 74 20 63 68 61 | 72 2d 74 6f 2d 73 74 72 |h dt cha|r-to-str|
|00000630| 69 6e 67 5d 20 35 5d 5d | 20 32 29 0a 28 66 73 65 |ing] 5]]| 2).(fse|
|00000640| 74 20 27 73 74 61 6e 64 | 61 72 64 2d 64 69 73 70 |t 'stand|ard-disp|
|00000650| 6c 61 79 2d 38 62 69 74 | 20 23 5b 28 6c 20 68 20 |lay-8bit| #[(l h |
|00000660| 26 6f 70 74 69 6f 6e 61 | 6c 20 6c 6f 63 61 6c 65 |&optiona|l locale|
|00000670| 29 20 22 c0 c1 5c 6e 5c | 22 87 22 20 5b 66 72 6f |) "..\n\|"." [fro|
|00000680| 62 2d 64 69 73 70 6c 61 | 79 2d 74 61 62 6c 65 20 |b-displa|y-table |
|00000690| 23 5b 28 78 29 20 22 c0 | 09 5c 6e 0b 23 87 22 20 |#[(x) ".|.\n.#." |
|000006a0| 5b 73 74 61 6e 64 61 72 | 64 2d 64 69 73 70 6c 61 |[standar|d-displa|
|000006b0| 79 2d 38 62 69 74 2d 31 | 20 78 20 6c 20 68 5d 20 |y-8bit-1| x l h] |
|000006c0| 34 5d 20 6c 6f 63 61 6c | 65 5d 20 33 20 22 5c 0a |4] local|e] 3 "\.|
|000006d0| 44 69 73 70 6c 61 79 20 | 63 68 61 72 61 63 74 65 |Display |characte|
|000006e0| 72 73 20 69 6e 20 74 68 | 65 20 72 61 6e 67 65 20 |rs in th|e range |
|000006f0| 4c 20 74 6f 20 48 20 6c | 69 74 65 72 61 6c 6c 79 |L to H l|iterally|
|00000700| 2e 22 5d 29 0a 28 66 73 | 65 74 20 27 73 74 61 6e |."]).(fs|et 'stan|
|00000710| 64 61 72 64 2d 64 69 73 | 70 6c 61 79 2d 64 65 66 |dard-dis|play-def|
|00000720| 61 75 6c 74 2d 31 20 23 | 5b 28 64 74 20 6c 20 68 |ault-1 #|[(dt l h|
|00000730| 29 20 22 08 09 58 ad 8b | 5c 6e 08 c3 49 88 08 54 |) "..X..|\n..I..T|
|00000740| 89 10 aa 71 87 22 20 5b | 6c 20 68 20 64 74 20 6e |...q." [|l h dt n|
|00000750| 69 6c 5d 20 34 5d 29 0a | 28 66 73 65 74 20 27 73 |il] 4]).|(fset 's|
|00000760| 74 61 6e 64 61 72 64 2d | 64 69 73 70 6c 61 79 2d |tandard-|display-|
|00000770| 64 65 66 61 75 6c 74 20 | 23 5b 28 6c 20 68 20 26 |default |#[(l h &|
|00000780| 6f 70 74 69 6f 6e 61 6c | 20 6c 6f 63 61 6c 65 29 |optional| locale)|
|00000790| 20 22 c0 c1 5c 6e 5c 22 | 87 22 20 5b 66 72 6f 62 | "..\n\"|." [frob|
|000007a0| 2d 64 69 73 70 6c 61 79 | 2d 74 61 62 6c 65 20 23 |-display|-table #|
|000007b0| 5b 28 78 29 20 22 c0 09 | 5c 6e 0b 23 87 22 20 5b |[(x) "..|\n.#." [|
|000007c0| 73 74 61 6e 64 61 72 64 | 2d 64 69 73 70 6c 61 79 |standard|-display|
|000007d0| 2d 64 65 66 61 75 6c 74 | 2d 31 20 78 20 6c 20 68 |-default|-1 x l h|
|000007e0| 5d 20 34 5d 20 6c 6f 63 | 61 6c 65 5d 20 33 20 22 |] 4] loc|ale] 3 "|
|000007f0| 5c 0a 44 69 73 70 6c 61 | 79 20 63 68 61 72 61 63 |\.Displa|y charac|
|00000800| 74 65 72 73 20 69 6e 20 | 74 68 65 20 72 61 6e 67 |ters in |the rang|
|00000810| 65 20 4c 20 74 6f 20 48 | 20 75 73 69 6e 67 20 74 |e L to H| using t|
|00000820| 68 65 20 64 65 66 61 75 | 6c 74 20 6e 6f 74 61 74 |he defau|lt notat|
|00000830| 69 6f 6e 2e 22 5d 29 0a | 28 66 73 65 74 20 27 73 |ion."]).|(fset 's|
|00000840| 74 61 6e 64 61 72 64 2d | 64 69 73 70 6c 61 79 2d |tandard-|display-|
|00000850| 61 73 63 69 69 20 23 5b | 28 63 20 73 20 26 6f 70 |ascii #[|(c s &op|
|00000860| 74 69 6f 6e 61 6c 20 6c | 6f 63 61 6c 65 29 20 22 |tional l|ocale) "|
|00000870| c0 c1 5c 6e 5c 22 87 22 | 20 5b 66 72 6f 62 2d 64 |..\n\"."| [frob-d|
|00000880| 69 73 70 6c 61 79 2d 74 | 61 62 6c 65 20 23 5b 28 |isplay-t|able #[(|
|00000890| 78 29 20 22 08 09 5c 6e | 49 87 22 20 5b 78 20 63 |x) "..\n|I." [x c|
|000008a0| 20 73 5d 20 33 5d 20 6c | 6f 63 61 6c 65 5d 20 33 | s] 3] l|ocale] 3|
|000008b0| 20 22 5c 0a 44 69 73 70 | 6c 61 79 20 63 68 61 72 | "\.Disp|lay char|
|000008c0| 61 63 74 65 72 20 43 20 | 75 73 69 6e 67 20 70 72 |acter C |using pr|
|000008d0| 69 6e 74 61 62 6c 65 20 | 73 74 72 69 6e 67 20 53 |intable |string S|
|000008e0| 2e 22 5d 29 0a 28 66 73 | 65 74 20 27 73 74 61 6e |."]).(fs|et 'stan|
|000008f0| 64 61 72 64 2d 64 69 73 | 70 6c 61 79 2d 67 31 20 |dard-dis|play-g1 |
|00000900| 23 5b 28 63 20 73 63 20 | 26 6c 6f 63 61 6c 65 29 |#[(c sc |&locale)|
|00000910| 20 22 c0 c1 5c 6e 5c 22 | 87 22 20 5b 66 72 6f 62 | "..\n\"|." [frob|
|00000920| 2d 64 69 73 70 6c 61 79 | 2d 74 61 62 6c 65 20 23 |-display|-table #|
|00000930| 5b 28 78 29 20 22 08 09 | c2 c3 0c 21 c5 51 49 87 |[(x) "..|...!.QI.|
|00000940| 22 20 5b 78 20 63 20 22 | 0e 22 20 63 68 61 72 2d |" [x c "|." char-|
|00000950| 74 6f 2d 73 74 72 69 6e | 67 20 73 63 20 22 0f 22 |to-strin|g sc "."|
|00000960| 5d 20 35 5d 20 6c 6f 63 | 61 6c 65 5d 20 33 20 22 |] 5] loc|ale] 3 "|
|00000970| 5c 0a 44 69 73 70 6c 61 | 79 20 63 68 61 72 61 63 |\.Displa|y charac|
|00000980| 74 65 72 20 43 20 61 73 | 20 63 68 61 72 61 63 74 |ter C as| charact|
|00000990| 65 72 20 53 43 20 69 6e | 20 74 68 65 20 67 31 20 |er SC in| the g1 |
|000009a0| 63 68 61 72 61 63 74 65 | 72 20 73 65 74 2e 0a 54 |characte|r set..T|
|000009b0| 68 69 73 20 66 75 6e 63 | 74 69 6f 6e 20 61 73 73 |his func|tion ass|
|000009c0| 75 6d 65 73 20 74 68 61 | 74 20 79 6f 75 72 20 74 |umes tha|t your t|
|000009d0| 65 72 6d 69 6e 61 6c 20 | 75 73 65 73 20 74 68 65 |erminal |uses the|
|000009e0| 20 53 4f 2f 53 49 20 63 | 68 61 72 61 63 74 65 72 | SO/SI c|haracter|
|000009f0| 73 3b 0a 69 74 20 69 73 | 20 6d 65 61 6e 69 6e 67 |s;.it is| meaning|
|00000a00| 6c 65 73 73 20 66 6f 72 | 20 61 6e 20 58 20 66 72 |less for| an X fr|
|00000a10| 61 6d 65 2e 22 5d 29 0a | 28 66 73 65 74 20 27 73 |ame."]).|(fset 's|
|00000a20| 74 61 6e 64 61 72 64 2d | 64 69 73 70 6c 61 79 2d |tandard-|display-|
|00000a30| 67 72 61 70 68 69 63 20 | 23 5b 28 63 20 67 63 20 |graphic |#[(c gc |
|00000a40| 26 6c 6f 63 61 6c 65 29 | 20 22 c0 c1 5c 6e 5c 22 |&locale)| "..\n\"|
|00000a50| 87 22 20 5b 66 72 6f 62 | 2d 64 69 73 70 6c 61 79 |." [frob|-display|
|00000a60| 2d 74 61 62 6c 65 20 23 | 5b 28 78 29 20 22 08 09 |-table #|[(x) "..|
|00000a70| c2 c3 0c 21 c5 51 49 87 | 22 20 5b 78 20 63 20 22 |...!.QI.|" [x c "|
|00000a80| 1b 28 30 22 20 63 68 61 | 72 2d 74 6f 2d 73 74 72 |.(0" cha|r-to-str|
|00000a90| 69 6e 67 20 67 63 20 22 | 1b 28 42 22 5d 20 35 5d |ing gc "|.(B"] 5]|
|00000aa0| 20 6c 6f 63 61 6c 65 5d | 20 33 20 22 5c 0a 44 69 | locale]| 3 "\.Di|
|00000ab0| 73 70 6c 61 79 20 63 68 | 61 72 61 63 74 65 72 20 |splay ch|aracter |
|00000ac0| 43 20 61 73 20 63 68 61 | 72 61 63 74 65 72 20 47 |C as cha|racter G|
|00000ad0| 43 20 69 6e 20 67 72 61 | 70 68 69 63 73 20 63 68 |C in gra|phics ch|
|00000ae0| 61 72 61 63 74 65 72 20 | 73 65 74 2e 0a 54 68 69 |aracter |set..Thi|
|00000af0| 73 20 66 75 6e 63 74 69 | 6f 6e 20 61 73 73 75 6d |s functi|on assum|
|00000b00| 65 73 20 56 54 31 30 30 | 2d 63 6f 6d 70 61 74 69 |es VT100|-compati|
|00000b10| 62 6c 65 20 65 73 63 61 | 70 65 73 3b 20 69 74 20 |ble esca|pes; it |
|00000b20| 69 73 20 6d 65 61 6e 69 | 6e 67 6c 65 73 73 20 66 |is meani|ngless f|
|00000b30| 6f 72 20 61 6e 0a 58 20 | 66 72 61 6d 65 2e 22 5d |or an.X |frame."]|
|00000b40| 29 0a 28 66 73 65 74 20 | 27 73 74 61 6e 64 61 72 |).(fset |'standar|
|00000b50| 64 2d 64 69 73 70 6c 61 | 79 2d 75 6e 64 65 72 6c |d-displa|y-underl|
|00000b60| 69 6e 65 20 23 5b 28 63 | 20 75 63 20 26 6c 6f 63 |ine #[(c| uc &loc|
|00000b70| 61 6c 65 29 20 22 c0 c1 | 5c 6e 5c 22 87 22 20 5b |ale) "..|\n\"." [|
|00000b80| 66 72 6f 62 2d 64 69 73 | 70 6c 61 79 2d 74 61 62 |frob-dis|play-tab|
|00000b90| 6c 65 20 23 5b 28 78 29 | 20 22 08 09 c2 c3 0c 21 |le #[(x)| ".....!|
|00000ba0| c5 51 49 87 22 20 5b 78 | 20 63 20 22 1b 5b 34 6d |.QI." [x| c ".[4m|
|00000bb0| 22 20 63 68 61 72 2d 74 | 6f 2d 73 74 72 69 6e 67 |" char-t|o-string|
|00000bc0| 20 75 63 20 22 1b 5b 6d | 22 5d 20 35 5d 20 6c 6f | uc ".[m|"] 5] lo|
|00000bd0| 63 61 6c 65 5d 20 33 20 | 22 5c 0a 44 69 73 70 6c |cale] 3 |"\.Displ|
|00000be0| 61 79 20 63 68 61 72 61 | 63 74 65 72 20 43 20 61 |ay chara|cter C a|
|00000bf0| 73 20 63 68 61 72 61 63 | 74 65 72 20 55 43 20 70 |s charac|ter UC p|
|00000c00| 6c 75 73 20 75 6e 64 65 | 72 6c 69 6e 69 6e 67 2e |lus unde|rlining.|
|00000c10| 22 5d 29 0a 28 66 73 65 | 74 20 27 73 74 61 6e 64 |"]).(fse|t 'stand|
|00000c20| 61 72 64 2d 64 69 73 70 | 6c 61 79 2d 65 75 72 6f |ard-disp|lay-euro|
|00000c30| 70 65 61 6e 20 23 5b 28 | 61 72 67 20 26 6f 70 74 |pean #[(|arg &opt|
|00000c40| 69 6f 6e 61 6c 20 6c 6f | 63 61 6c 65 29 20 22 c0 |ional lo|cale) ".|
|00000c50| c1 5c 6e 5c 22 87 22 20 | 5b 66 72 6f 62 2d 64 69 |.\n\"." |[frob-di|
|00000c60| 73 70 6c 61 79 2d 74 61 | 62 6c 65 20 23 5b 28 78 |splay-ta|ble #[(x|
|00000c70| 29 20 22 c0 09 21 c2 58 | ac 8c 09 ac 8f 0b c4 48 |) "..!.X|.......H|
|00000c80| c5 c4 21 9a ab 86 c6 0b | c4 c7 23 87 c8 0b c4 c7 |..!.....|..#.....|
|00000c90| 23 87 22 20 5b 70 72 65 | 66 69 78 2d 6e 75 6d 65 |#." [pre|fix-nume|
|00000ca0| 72 69 63 2d 76 61 6c 75 | 65 20 61 72 67 20 30 20 |ric-valu|e arg 0 |
|00000cb0| 78 20 31 36 30 20 63 68 | 61 72 2d 74 6f 2d 73 74 |x 160 ch|ar-to-st|
|00000cc0| 72 69 6e 67 20 73 74 61 | 6e 64 61 72 64 2d 64 69 |ring sta|ndard-di|
|00000cd0| 73 70 6c 61 79 2d 64 65 | 66 61 75 6c 74 2d 31 20 |splay-de|fault-1 |
|00000ce0| 32 35 35 20 73 74 61 6e | 64 61 72 64 2d 64 69 73 |255 stan|dard-dis|
|00000cf0| 70 6c 61 79 2d 38 62 69 | 74 2d 31 5d 20 34 5d 20 |play-8bi|t-1] 4] |
|00000d00| 6c 6f 63 61 6c 65 5d 20 | 33 20 22 5c 0a 54 6f 67 |locale] |3 "\.Tog|
|00000d10| 67 6c 65 20 64 69 73 70 | 6c 61 79 20 6f 66 20 45 |gle disp|lay of E|
|00000d20| 75 72 6f 70 65 61 6e 20 | 63 68 61 72 61 63 74 65 |uropean |characte|
|00000d30| 72 73 20 65 6e 63 6f 64 | 65 64 20 77 69 74 68 20 |rs encod|ed with |
|00000d40| 49 53 4f 20 38 38 35 39 | 2e 0a 57 68 65 6e 20 65 |ISO 8859|..When e|
|00000d50| 6e 61 62 6c 65 64 2c 20 | 63 68 61 72 61 63 74 65 |nabled, |characte|
|00000d60| 72 73 20 69 6e 20 74 68 | 65 20 72 61 6e 67 65 20 |rs in th|e range |
|00000d70| 6f 66 20 31 36 30 20 74 | 6f 20 32 35 35 20 64 69 |of 160 t|o 255 di|
|00000d80| 73 70 6c 61 79 20 6e 6f | 74 0a 61 73 20 6f 63 74 |splay no|t.as oct|
|00000d90| 61 6c 20 65 73 63 61 70 | 65 73 2c 20 62 75 74 20 |al escap|es, but |
|00000da0| 61 73 20 61 63 63 65 6e | 74 65 64 20 63 68 61 72 |as accen|ted char|
|00000db0| 61 63 74 65 72 73 2e 0a | 57 69 74 68 20 70 72 65 |acters..|With pre|
|00000dc0| 66 69 78 20 61 72 67 75 | 6d 65 6e 74 2c 20 65 6e |fix argu|ment, en|
|00000dd0| 61 62 6c 65 20 45 75 72 | 6f 70 65 61 6e 20 63 68 |able Eur|opean ch|
|00000de0| 61 72 61 63 74 65 72 20 | 64 69 73 70 6c 61 79 20 |aracter |display |
|00000df0| 69 66 66 20 61 72 67 20 | 69 73 20 70 6f 73 69 74 |iff arg |is posit|
|00000e00| 69 76 65 2e 22 20 22 50 | 22 5d 29 0a 28 70 72 6f |ive." "P|"]).(pro|
|00000e10| 76 69 64 65 20 27 64 69 | 73 70 2d 74 61 62 6c 65 |vide 'di|sp-table|
|00000e20| 29 0a | |). | |
+--------+-------------------------+-------------------------+--------+--------+
